﻿Public Class RCLogConfig

    Public Property intReadThreadPriority As Integer
    Public Property intTempEventsBufSize As Integer
    Public Property strReaderStatus As String

    Public Sub New(ByVal inReadThreadPriority As Integer, ByVal inTempEventsBufSize As Integer, ByVal inReaderStatus As String)
        intReadThreadPriority = inReadThreadPriority
        intTempEventsBufSize = inTempEventsBufSize
        strReaderStatus = inReaderStatus
    End Sub

    Public Sub New()
        intReadThreadPriority = 0
        intTempEventsBufSize = 0
        strReaderStatus = "OFF"
    End Sub

    Public Sub Clear()
        intReadThreadPriority = 0
        intTempEventsBufSize = 0
        strReaderStatus = "OFF"
    End Sub

End Class
